data <- read.table("../logs/latency2.log")
data_jitter <- read.table("../logs/jitter.log")

TimeJ <- data_jitter$V1
Jitter <- data_jitter$V2

Time <- data$V1
Latency <- data$V2
Error <- data$V3

jpeg(file="../graphs/hist_latency.jpg")
hist(Latency, main="Histograma de Latências", xlab="Latência (ms)", ylab="Frequência", ylim=c(0,0.10), freq=F)
dev.off()

jpeg(file="../graphs/hist_jitter.jpg")
hist(Jitter, main="Histograma de Jitters", xlab="Jitter (ms)", ylab="Frequência", ylim=c(0,0.05), freq=F)
dev.off()

q()



